1) PT2D.F4[NEW,LCS] and 2) PT2D.OL3[NEW,LCS]	10-23-77 15:57	pages 2,2

**** File 1) PT2D.F4[NEW,LCS], Page 2 line 14
1)		1/BRJ/JTOT,TURN,NB
1)		EQUIVALENCE (RQ(2),R4),(R5,RQ(3)),(R6,RQ(4)),(R7,RQ(5)),(KT,KBAR)
**** File 2) PT2D.OL3[NEW,LCS], Page 2 line 14
2)		1/BRJ/JTOT,TRN,NB
2)		EQUIVALENCE (RQ(2),R4),(R5,RQ(3)),(R6,RQ(4)),(R7,RQ(5)),(KT,KBAR)
***************


**** File 1) PT2D.F4[NEW,LCS], Page 2 line 69
1)	CCC	IF(TURN.EQ.0)TURN=1000.
1)	101	JTOT=0
**** File 2) PT2D.OL3[NEW,LCS], Page 2 line 69
2)		TYPE 2003
2)	2003	FORMAT(' TYPE PAGE TURN TIME (.5=1/8 REST, 1=1/4 REST, ETC.)--'$)
2)		ACCEPT 145,TRN
2)		IF(TRN.EQ.0)TRN=100.
2)	101	JTOT=0
***************


**** File 1) PT2D.F4[NEW,LCS], Page 2 line 88
1)		RA=0
**** File 2) PT2D.OL3[NEW,LCS], Page 2 line 92
2)	140	TYPE 90,KT
2)		RA=0
***************


**** File 1) PT2D.F4[NEW,LCS], Page 2 line 97
1)		TYPE 2003
1)	2003	FORMAT(' FIND PAGE TURNS?  '$)
1)		ACCEPT 2101,K
1)		IF(K.NE.'Y')GO TO 140
1)		CALL FNDTRN(RPG,PGTRN,JBAR,IBAR,KT,KB)
1)		IF(IBAR(1).NE.0)GO TO 119
1)	140	TYPE 90,KT
1)		TURN=1000.
1)	16	CALL BRJUGL(JBAR(1),KT,NBAR(1),MBAR(1),JRN(1),PGTRN(1)
**** File 2) PT2D.OL3[NEW,LCS], Page 2 line 102
2)	16	CALL BRJUGL(JBAR(1),KT,NBAR(1),MBAR(1),JRN(1),PGTRN(1)
***************